home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / program / ddj0897.zip / DYN401.ZIP / class / stream.c < prev    next >
C/C++ Source or Header  |  1997-04-16  |  2KB  |  118 lines
  1.  
  2.  
  3. /*  Copyright (c) 1993-1996 Algorithms Corporation  */
  4. /*  All rights reserved.  */
  5.  
  6.  
  7.  
  8.  
  9. /*  This file automatically generated by dpp - do not edit  */
  10.  
  11. #define    DPP_STRATEGY    2
  12. #define    DPP_FASTWIDE    0
  13.  
  14.  
  15.  
  16. #line 15 "stream.d"
  17. #include <string.h> 
  18.  
  19. #define    CLASS    Stream_c
  20. #define    ivType    Stream_iv_t
  21.  
  22. #include "generics.h"
  23.  
  24. object    Stream_c;
  25.  
  26.  
  27. #line 23 "stream.d"
  28. object stdoutStream_o, stdinStream_o, stderrStream_o, traceStream_o; 
  29.  
  30.  
  31. imeth int Stream_im_gPuts(object self, char *str)
  32. { 
  33.     if (IsObj((object)str)) 
  34.         str = gStringValue((object)str); 
  35.     return gWrite(self, str, strlen(str)); 
  36. } 
  37.  
  38. imeth int Stream_im_gPutc(object self, int i)
  39. { 
  40.     char c = (char) i; 
  41.     return 1 == (gWrite(self, &c, 1)) ? i : EOF; 
  42. } 
  43.  
  44. ivmeth int Stream_ivm_vPrintf(object self, va_list _rest_)
  45. { char * fmt = va_arg(_rest_, char *);
  46.     char buf[256]; 
  47.     MAKE_REST(fmt); 
  48.  
  49.     vsprintf(buf, fmt, _rest_); 
  50.     return gWrite(self, buf, strlen(buf)); 
  51. } 
  52.  
  53. #line 54 "stream.c"
  54.  
  55. static    int    Stream_ifm_vPrintf(object self, ...)
  56. {
  57.     va_list    _rest_;
  58.     va_start(_rest_, self);
  59.     return Stream_ivm_vPrintf(self, _rest_);
  60. }
  61.  
  62.  
  63.  
  64. #line 48 "stream.d"
  65. imeth objrtn Stream_im_gCopy(object self)
  66. { 
  67.     return gShouldNotImplement(self, "Copy/DeepCopy"); 
  68. } 
  69.  
  70. static void class_init(void) 
  71. { 
  72.     Dynace; 
  73.     RegisterVariable(stdoutStream_o); 
  74.     RegisterVariable(stderrStream_o); 
  75.     RegisterVariable(stdinStream_o); 
  76.     RegisterVariable(traceStream_o); 
  77. } 
  78.  
  79. #line 80 "stream.c"
  80.  
  81. objrtn    Stream_initialize(void)
  82. {
  83.     static  CRITICALSECTION  cs;
  84.     static  int volatile once = 0;
  85.  
  86.     ENTERCRITICALSECTION(_CI_CS_);
  87.     if (!once) {
  88.         INITIALIZECRITICALSECTION(cs);
  89.         once = 1;
  90.     }
  91.     LEAVECRITICALSECTION(_CI_CS_);
  92.  
  93.     ENTERCRITICALSECTION(cs);
  94.  
  95.     if (Stream_c) {
  96.         LEAVECRITICALSECTION(cs);
  97.         return Stream_c;
  98.     }
  99.     INHIBIT_THREADER;
  100.     Stream_c = gNewClass(Class, "Stream", 0, 0, END);
  101.     iMethodFor(Stream, gPuts, Stream_im_gPuts);
  102.     ivMethodFor(Stream, vPrintf, Stream_ivm_vPrintf, Stream_ifm_vPrintf);
  103.     iMethodFor(Stream, gPutc, Stream_im_gPutc);
  104.     iMethodFor(Stream, gCopy, Stream_im_gCopy);
  105.     iMethodFor(Stream, gDeepCopy, Stream_im_gCopy);
  106.  
  107.     class_init();
  108.  
  109.     ENABLE_THREADER;
  110.  
  111.     LEAVECRITICALSECTION(cs);
  112.  
  113.     return Stream_c;
  114. }
  115.  
  116.  
  117.  
  118.